home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / pibtscr4.arc / COMPUSRV.SCR < prev    next >
Encoding:
Text File  |  1986-01-08  |  384 b   |  16 lines
  1. param te=1
  2. clear
  3. message "***** Dialing Comp U Serve *****"                
  4. dial "8"
  5. delay 40              
  6. stext "^C ^C"             
  7. waitstring "User ID:"       
  8. stext "           |"     
  9. waitstring "Password:"      
  10. stext "           |"
  11. clear
  12. if connected
  13.    key "comp"
  14.    exit
  15. endif 
  16.